<System.ComponentModel.TypeConverter(GetType(BookToString))> _
Public Class Book
    Private strISBN As String = "076457860X"
    Private strRating As String = "4"
    Private strDescription As String = "Custom controls and Web Parts"

    Public Sub New(ByVal ISBN As String)

    End Sub

    Public Property ISBN() As String
        Get
            Return strISBN
        End Get
        Set(ByVal value As String)
            strISBN = value
        End Set
    End Property

    Public Property CustomerRating() As String
        Get
            Return strRating
        End Get
        Set(ByVal value As String)
            strRating = value
        End Set
    End Property

    Public Property Description() As String
        Get
            Return strDescription
        End Get
        Set(ByVal value As String)
            strDescription = value
        End Set
    End Property
End Class
